! ---
! Copyright (C) 1996-2016       The SIESTA group
!  This file is distributed under the terms of the
!  GNU General Public License: see COPYING in the top directory
!  or http://www.gnu.org/copyleft/gpl.txt .
! See Docs/Contributors.txt for a list of contributors.
! ---
      subroutine timer(prog,iopt)
      character(len=*),intent(in):: prog ! Name of program to time
      integer,         intent(in):: iOpt ! Action option

!     Dummy to avoid compilation cascades

      end subroutine timer
